﻿Public Class SachCrt
   
    Private _maSach As Integer
    Private _tenSach As String
    Private _maTheLoai As Integer
    Private _tacGia As String
    Private _nhaXuatBan As String
    Private _namXuatBan As DateTime
    Private _ngayNhap As DateTime
    Private _triGiaTu As Double
    Private _triGiaDen As Double
    Private _maNhanVien As Integer
    Private _khoangCachXuatBan As Double
    Private _maTinhTrang As Integer

    Public Property MaSach() As Integer
        Get
            Return _maSach
        End Get
        Set(ByVal value As Integer)
            _maSach = value
        End Set
    End Property

    Public Property TenSach() As String
        Get
            Return _tenSach
        End Get
        Set(ByVal value As String)
            _tenSach = value
        End Set
    End Property

    Public Property MaTheLoai() As Integer
        Get
            Return _maTheLoai
        End Get
        Set(ByVal value As Integer)
            _maTheLoai = value
        End Set
    End Property

    Public Property TacGia() As String
        Get
            Return _tacGia
        End Get
        Set(ByVal value As String)
            _tacGia = value
        End Set
    End Property

    Public Property NhaXuatBan() As String
        Get
            Return _nhaXuatBan
        End Get
        Set(ByVal value As String)
            _nhaXuatBan = value
        End Set
    End Property

    Public Property NamXuatBan() As DateTime
        Get
            Return _namXuatBan
        End Get
        Set(ByVal value As DateTime)
            _namXuatBan = value
        End Set
    End Property

    Public Property NgayNhap() As DateTime
        Get
            Return _ngayNhap
        End Get
        Set(ByVal value As DateTime)
            _ngayNhap = value
        End Set
    End Property

    Public Property TriGiaTu() As Double
        Get
            Return _triGiaTu
        End Get
        Set(ByVal value As Double)
            _triGiaTu = value
        End Set
    End Property

    Public Property TriGiaDen() As Double
        Get
            Return _triGiaDen
        End Get
        Set(ByVal value As Double)
            _triGiaDen = value
        End Set
    End Property
    Public Property MaNhanVien() As Integer
        Get
            Return _maNhanVien
        End Get
        Set(ByVal value As Integer)
            _maNhanVien = value
        End Set
    End Property

    Public Property MaTinhTrang() As Integer
        Get
            Return _maTinhTrang
        End Get
        Set(ByVal value As Integer)
            _maTinhTrang = value
        End Set
    End Property

    Public Property KhoangCachXuatBan() As Double
        Get
            Return _khoangCachXuatBan
        End Get
        Set(ByVal value As Double)
            _khoangCachXuatBan = value
        End Set
    End Property


    Private _checkMaSach As Boolean
    Private _checkTenSach As Boolean
    Private _checkNhaXuatBan As Boolean
    Private _checkNamXuatBan As Boolean
    Private _checkTacGia As Boolean
    Private _checkMaTheLoai As Boolean
    Private _checkNgayNhap As Boolean
    Private _checkTriGia As Boolean
    Private _checkMaTinhTrang As Boolean
    Private _checkMaNhanVien As Boolean
    Private _checkKhoangCachXuatBan As Boolean


    Public Property CheckMaSach() As Boolean
        Get
            Return _checkMaSach
        End Get
        Set(ByVal value As Boolean)
            _checkMaSach = value
        End Set
    End Property

    Public Property CheckTenSach() As Boolean
        Get
            Return _checkTenSach
        End Get
        Set(ByVal value As Boolean)
            _checkTenSach = value
        End Set
    End Property

    Public Property CheckMaTheLoai() As Boolean
        Get
            Return _checkMaTheLoai
        End Get
        Set(ByVal value As Boolean)
            _checkMaTheLoai = value
        End Set
    End Property

    Public Property CheckTacGia() As Boolean
        Get
            Return _checkTacGia
        End Get
        Set(ByVal value As Boolean)
            _checkTacGia = value
        End Set
    End Property

    Public Property CheckTriGia() As Boolean
        Get
            Return _checkTriGia
        End Get
        Set(ByVal value As Boolean)

            _checkTriGia = value
        End Set
    End Property

    Public Property CheckNhaXuatBan() As Boolean
        Get
            Return _checkNhaXuatBan
        End Get
        Set(ByVal value As Boolean)
            _checkNhaXuatBan = value
        End Set
    End Property

    Public Property CheckNamXuatBan() As Boolean
        Get
            Return _checkNamXuatBan
        End Get
        Set(ByVal value As Boolean)
            _checkNamXuatBan = value
        End Set
    End Property

    Public Property CheckKhoangCachXuatBan() As Boolean
        Get
            Return _checkKhoangCachXuatBan
        End Get
        Set(ByVal value As Boolean)
            _checkKhoangCachXuatBan = value
        End Set
    End Property

    Public Property CheckMaTinhTrang() As Boolean
        Get
            Return _checkMaTinhTrang
        End Get
        Set(ByVal value As Boolean)
            _checkMaTinhTrang = value
        End Set
    End Property

    Public Property CheckMaNhanVien() As Boolean
        Get
            Return _checkMaNhanVien
        End Get
        Set(ByVal value As Boolean)
            _checkMaNhanVien = value
        End Set
    End Property

    Public Property CheckNgayNhap() As Boolean
        Get
            Return _checkNgayNhap
        End Get
        Set(ByVal value As Boolean)
            _checkNgayNhap = value
        End Set
    End Property
End Class
